home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / eulisp / mpfeel.lha / MPFeel / Plurals / mp_main.h < prev    next >
C/C++ Source or Header  |  1991-11-28  |  1KB  |  72 lines
  1. /*
  2.  *    Plurals
  3.  *
  4.  *    Author:    S.C.Merrall
  5.  *
  6.  *    File:    mp_main.h
  7.  *
  8.  *    Contents:    
  9.  *
  10.  *    Description:       External declarations of all functions operating
  11.  *             on Plural lisp objects, that is MasPar Plural Heap
  12.  *            objects . (At this time)
  13.  *
  14.  *    Change History:
  15.  *
  16.  *    Date   Name Comment
  17.  *    -------- ---- -------
  18.  *    23:04:91 SCM  Created
  19.  *    14:04:91 SCM  print_lisp_object => print
  20.  *    16:06:91 SCM  Moved to mp_lispobject.h
  21.  *    16:06:91 SCM  Added scratch
  22.  *
  23.  */
  24.  
  25. #ifdef __STDC__
  26.  
  27. extern plural int print( object, int );
  28.  
  29. extern  int cons( object, object, object );
  30. extern  int car( object, object );
  31. extern  int cdr( object, object );
  32. extern  int rplac_a( object, object );
  33. extern  int rplac_d( object, object );
  34.  
  35. extern int plus( object, object, object );
  36. extern int less_than( object, object, object );
  37. extern int and( object, object, object );
  38.  
  39. extern int make_vector( int, object );
  40. extern int vector_set( object, int, object );
  41. extern int vector_ref( object, int, object );
  42.  
  43. extern object alloc_plural( object, int );
  44.  
  45. extern int mp_if( object, object );
  46.  
  47. #else
  48.  
  49. extern  plural int print();
  50.  
  51. extern  int cons();
  52. extern  int car();
  53. extern  int cdr();
  54. extern  int rplac_a();
  55. extern  int rplac_d();
  56.  
  57. extern int plus();
  58. extern int less_than();
  59. extern int and(); 
  60.  
  61. extern int make_vector();
  62. extern int vector_set();
  63. extern int vector_ref();
  64.  
  65. extern object alloc_plural();
  66.  
  67. extern int mp_if();
  68.  
  69. #endif
  70.  
  71. extern plural char scratch[];
  72.